Excel VBA编程教程（基础一）

大家好，又见面了，我是你们的朋友全栈君。

Visual Basic for Applications（VBA）是 VisualBasic 的一种宏语言，是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展 Windows 的应用程序功能，特别是Microsoft Office软件。

说简单点，VBA 是运行在 Microsoft Office 软件之上，可以用来编写非软件自带的功能的编程语言。Office 软件提供丰富的功能接口，VBA 可以调用它们，实现自定义的需求。基本上，能用鼠标和键盘能做的事情，VBA 也能做。

正如前文所述，VBA 可以运行在 Office 软件上，包括 Excel、Word、PPT、Outlook 等。VBA 语言在 Office 软件中是通用的，基本语法和用法都相同。但是每一个软件具有自己独有的对象，例如 Excel 有单元格对象，Word 有段落对象，PPT 有幻灯片对象。

「宏」：简单的说，宏是一段可以运行的 VBA 代码片段。

首先新建一个工作簿，并将工作簿保存为「启用宏的工作簿」类型。详细步骤查看这篇文章。

通过功能区「开发工具 → 代码→Visual Basic」或快捷键 Alt + F11 打开 VBA 编辑器。详细步骤参考这篇文章。

Excel 工作簿中的 VBA 代码通常保存在工作表对象或模块中。本例中，我们用模块保存 VBA 代码。

首先选中左侧工程列表中的工作簿，后右键，在弹出的选项列表中，选择「插入」。二级菜单中，选择「模块」，完成插入新模块。

插入完成后，在工程列表对应工作簿内，在模块文件夹下，显示新插入的模块。新插入的模块的默认名称是，模块 x，本例中是模块1。在属性窗口，可以修改模块的名称。

双击上一步插入的模块1，在右侧代码窗口区域里，将打开模块1的代码编辑器。在右侧代码窗口中当前打开的代码编辑器所对应的模块，在编辑器标题末尾可以看到。

在代码编辑窗口中，输入以下代码：

这段代码是一个空的 VBA 过程，只有开始和结束。过程的其他代码，都在这中间编写。

其中 Sub 是 Subroutine 的缩写，直译过来是子程序。在 VBA 中表示一个过程，也是代表一个过程的开始。下一行 End Sub 表示过程的结束。

过程的实体部分指的是，真正会被执行的部分。上一步创建的是一个空的 VBA 过程，里面不包含实体代码。虽然可以正常运行，但是不会有结果输出。

这一步我们编写 VBA 过程的实体部分。将如下代码输入到过程的开始和结束处之间。

现在我们已经写完了一个完整的 VBA 过程，现在运行它，看一下结果。

将光标放置在代码的任何一处，点击工具栏上的运行「▶ 」按钮，或按 F5，运行代码。

可以看到运行结果，Excel 弹出一个对话框，显示内容正是在代码中编写的内容。

编辑器中每个模块的基本用法如下：

通常，一个工作簿就是一个 VBA 工程，其中包括 Excel 对象、工作表对象、模块等。当多个工作簿同时打开时，他们公用同一个 VBA 编辑器，VBA 工程界面显示所有的 VBA 工程。

在一个 VBA 工程中想要插入新的模块时，可在 VBA 工程右键，选择插入类型即可。

要删除模块，选中模块，右键，选择「移除 模块」

首先，本篇将使用以下代码，介绍各种程序结构，大家可以先看一下。

以上代码运行后，在 A2:A10 单元格区域，依次判断每一个单元格是否为空，如果是空，则用上一个单元格的值填充。

过程是 VBA 中，程序实际运行的最小结构。单独的一行或多行代码无法运行，必须把它们放置在一个过程里，才能运行。

在示例中，Sub 过程名() 开头，End Sub 为结尾部分是一个过程的主题，其余代码需要放置在两者之间。

语句，是表示一个完整意思的一行代码。

例如，示例中第一行，声明变量就是一条语句。它表示，声明一个整型变量。同理，第二行、第三行和其余的每一行都是语句。VBA 中的过程，就是由这样一条条语句构成的。

通常，一行就是一个语句，除非它用换行符或合并符号.

我们学习 VBA 的最终目的是操纵 Excel，完成一些特定的目标。其中，操纵 Excel 就是通过 Excel VBA 对象完成的。

在示例中，Cells() 就是一个 Excel VBA 对象，表示一个单元格，提供行号和列号指定单元格。

接下来是程序结构中最核心的部分，也是最有意思的部分，程序运行结构。大部分编程语言都具备基本的三种程序运行结构，分别是顺序结构、循环结构、判断结构。各种简单到复杂的算法，都是由这三种基本的结构，相互组合而完成。

首先是基本的顺序结构。顺序结构，顾名思义就是按照顺序依次执行。VBA 中的顺序就是从上到下、从左到右的顺序。

在示例中，首先运行两个声明语句，然后运行循环结构，以此类推。值得注意的事，当程序有嵌套时，嵌套的部分也是按照顺序指定的。

第二个基本结构是循环结构。当使用循环结构时，循环部分代码，按照指定的循环次数，循环重复执行。

在我们的示例中，For 至 Next i 之间的代码就是一个循环代码。

VBA 中，有多种循环结构，本例中是 For 循环结构。For 循环结构中，第一行指定循环次数，最后一行表示开始下一个循环。

最后一种基本结构是，判断结构。简单来说，该结构中，当提供的表达式为真(True)时，判断结构的主体部分才会被执行，否则跳过。

在示例代码中，If 开头和 End If 结尾处是典型的判断结构。第一行，判断 isBlank 变量是否为真，如果是，则执行判断结构主体部分，否则跳过。

下面，我们实际运行我们的示例代码，看一看它具体的效果。

Excel 是一个对象，这个对象包含很多属性和子对象，而 VBA 是可以操作这些对象的工具，实现各种各样的效果。例如，Excel 包括 Range 对象，即单元格对象，使用 VBA 可以改变单元格对象的填充颜色属性。用代码表示如下。

变量是存储数据的一种表达方式。在程序开始，可以声明一个变量，指定变量的类型（数字、文本、逻辑值等），并给变量赋值。在程序其他地方，就可以用该变量，使其存储的值参与运算。

组表示一组同类型的数据的集合，是 VBA 中最重要的概念之一。以下面的代码为例：

使用 VBA 开发某项功能，本质上是，对变量进行基础的运算和操作，例如加减乘除比较等。为此，VBA 提供了很多运算符和操作符，利用它们可以实现复杂的运算。

今天先学习 VBA 提供的基础运算符和操作，以及它们的基本用法。VBA 运算符可以分为以下 6 类：

VBA 中的连接运算符用于连接 2 个或多个文本。其用法与 Excel 公式中的 & 符号相同。

运算符

说明

示例

&

连接两个文本

“Zhang” & ” ” & “San” -> “Zhang San”

运算符

说明

_ (下划线)

将一行代码分解成两行

: ( 英文冒号)

将两行代码放置在一行

比较运算符，比较提供的两个变量，如果符合比较条件，返回 True，否则，返回 False。

假设 a = 10，b = 3，-> 表示结果。

运算符

说明

示例

=

比较两个值是否相等

a = b -> False

>

大于

a > b -> True

>=

大于等于

a >= b => False

False

True

通常，一段代码写完后，不会完全没问题。在实际使用过程中可能需要修改，符合最新的需求。过一段时间再打开查看时，可能已经忘记了当时的思路，不能很快想起来有些代码实际的用途，更不用说让别人查看了。这时，就需要注释出场了。

注释是对代码的一种解释，不影响代码的运行。VBA 中的注释语句是，以英文单引号 (')开头，后接需要解释说明的内容。

选择结构中，If Then 结构是最基础的一个。它只有条件表达式真时，执行的代码。

If Then 结构基本语法如下，其中 End If是选择结构的结束标志。

现在我们看实际的例子，判断学生是否及格，及格条件是成绩 ≥60。如果及格，在C列对应单元格填写“及格”。具体代码如下：

我们可以看到，我们使用 B 列中的学生成绩与 60 分比较，如果≥60分，就在 C 列填写及格。

条件表达式是 Cells(i, "B").Value >= 60，选择性执行的代码部分是 Cells(i, "C") = "及格"。

其中，For 语句是表示循环结构，这里只需知道程序从第一个学生循环到最后一个学生，依次判断每个学生的成绩。循环结构将在下一篇中做详细介绍。

将以上代码运行后，可以看到运行结果如下：

很多时候，我们根据表达式的真假，真时执行一块代码，假时执行另一块代码。这种需求可以使用 If Else结构实现。

If Else结构中，条件表达式在真时，执行Then后的代码；条件表达式为假时，执行 Else后的代码。基本语法如下：

我们继续看实际的例子。在上一个例子的基础上，这次对不及格的学生，在C列填入不及格。代码如下：

在这个例子中，条件表达式 Cells(i, "B").Value >= 60为假时，表示学生成绩低于60分，即不及格。这时就执行 Else后的代码。

程序运行结果如下：

VBA 中程序循环结构基础，以及多种循环结构形式。包括子类在内，VBA 中常使用的循环结构包括 6 种，它们是：

循环结构

说明

For … Next 循环

按指定次数循环执行

For Each 循环

逐一遍历数据集合中的每一个元素

Do While … Loop 循环

当条件为真时，循环执行

Do … Loop While 循环

当条件为真时，循环执行。无论条件真假，至少运行一次

Do Until … Loop 循环

直到条件为真时，循环执行

Do … Loop Until 循环

直到条件为真时，循环执行。无论条件真假，至少运行一次

此外，学习了两种跳出循环的语句，它们是：

跳出语句

说明

Exit For

跳出 For 循环

Exit Do

跳出 Do While/Until 循环

本文介绍两个常用的循环

使用 For ... Next循环可以按指定次数，循环执行一段代码。For 循环使用一个数字变量，从初始值开始，每循环一次，变量值增加或减小，直到变量的值等于指定的结束值时，循环结束。

For ... Next 循环语法如下：

其中：

下面看一个实际的例子，求 1 至 10 数字的累积和。

可以看到，For 循环使用i变量，循环 10 次，i 的值从 1 到 10 变化。

值得注意的是，For 循环的 Step 值如果是 1，则 Step 关键词可省略。上述过程循环部分可写成如下方式：

Do While循环用于满足指定条件时循环执行一段代码的情形。循环的指定条件在 While关键词后书写。

Do While … Loop循环，根据 While 关键词后的条件表达式的值，真时执行，假时停止执行。基本语法如下：

其中，只要 [条件表达式] 为真，将一直循环执行。[条件表达式] 一旦为假，则停止循环，程序执行 Loop 关键词后的代码。

看一个实际的例子，还是求 1- 10 累积和。